ocr: Paradox for Windows File Edit View Search Program Properties Tools Window Help 11 L a 0 to: 10010 E FIGURE2.FSL#mFormlsclose method Close(var eventinto Event) lE FIGURE2.FSL-#Forml:Var var Uar FF Form formName String enduar endUar if eventInfo.isPreFilter0) then ;/1 This code executes for each object on the Edit Line: 1: else ;11 - This code executes only for the form if FormName.1sAssigned() then while F.attacn(Formhane) f.close() endWhile errorClear0 endif endif D FIGUREZ.FSL:Buttonl-pushBiutton endmethod method pushButton(uar eventinto Event) + var FF Form enduar if F.open("DEMO") then Butt ...
